home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Loadstar 52
/
052.d81
/
easy dos it
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-08-26
|
2KB
|
53 lines
5 ifa=. then 99
6 print"[147]":poke53280,.:poke53281,.
7 print" '[197][193][211][217] [196][207][211][160][201][212]'[154] is now...";
8 sys 53000 :print
9 print"[154][210]emember to type [211][217][211]53000 [154]to toggle"
10 print"[154]between [207][206] and [207][198][198].
50 [128]
99 [151]53265,[194](53265)[175]239
100 [151]53280, 0:[151]53281, 1:[153]"loadreturn";
101 [153]"stop waitOusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusr";
102 [153]"usrusrusrPstop cont waitsgnloadstarpresentsthen cont stop cont ";
103 [153]" waitLandandandandandandandandandandandandandandandandandandandandandsqr cont stop cont ";
104 [153]" cont stop cont stop cont ";
105 [153]" stop cont waitclrOusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrPcont stop ";
106 [153]" cont waitclrsgneasydositclrthen cont stop cont waitclrsgnprint#tab(tab(tab(tab(tab(tab(tab(tab(";
107 [153]"tab(tab(tab(clrthen cont stop cont waitclrsgnthen cont stop ";
108 [153]" cont waitclrsgncontwrittenbyclrthen cont stop cont waitclrfn";
109 [153]"then cont stop cont waitclrfncontbuckchildressclrthen cont stop ";
110 [153]" cont waitclrLandandandandandandandandandandandandandandandandandsqr cont stop cont ";
111 [153]" cont stop cont poke cont stop cont ";
112 [153]"waitOusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrPcont stop cont waitsgnopencopyright1988then";
113 [153]" cont stop cont waitLandandandandandandandandandandandandandandandandandandandandsqr cont stop cont ";
114 [153]" stop cont stop cont poke cont ";
115 [153]"stop cont waitOusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrPcont stop cont waitsgnpresssp";
116 [153]"acetocontinuethen cont stop wait(NULL)andandandandandandandandandandandandandandandandandandandandandandandandsqrstop "
117 [151]56295,.:[151]2023,32[170]128
125 [151]53265,[194](53265)[176]16
130 [161]a$:[139]a$[179][177]" "[167]130
150 :
151 :
152 :
199 [151]53265,[194](53265)[175]239
200 [151]53280, 0:[151]53281, 0:[153]"load";
201 [153]"EASYcloseDOSIT"
202 [153]"print#tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab("
203 [153]"contOnce'EASYDOSIT'contisinstalled"
204 [153]"youwillhavetodeactivateit"
205 [153]"andrebootsysLOADSTARconttoreturn"
206 [153]"tothemenusystem."
207 [153]"close"
208 [153]"print#---"
209 [153]"contcloseprintDoyouwishtocontinuewith"
210 [153]"contcloseprintloading'EASYDOSIT'print?"
211 [153]"contPleaserespondprint#(YcontorNprint#)cont:"
220 [151]53265,[194](53265)[176]16
225 [161]a$:[139]a$[178]""[167]225
227 [139]a$[178]"y"[176]a$[178]"(NULL)"[167]230
228 [139]a$[178]"(NULL)"[176]a$[178]"n"[167]300
230 a[178]1:[147]"easy dos it.o",8,1
300 [159]15,8,15,"r0:hello connect=hello connect":[132]15,er,er$:[160]15
301 [139]er[179][177]63 [167] [153]"load":[128]
302 [147]"hello connect",8,1